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-Abstract- 

The problem of defining Semi-Simplicial Types (SSTs) in Homotopy Type Theory (HoTT) has 
been recognized as important during the Year of Univalent Foundations at the Institute of Ad¬ 
vanced Study M- According to the interpretation of HoTT in Quillen model categories [5], SSTs 
are type-theoretic versions of Reedy fibrant semi-simplicial objects in a model category and sim- 
plicial and semi-simplicial objects play a crucial role in many constructions in homotopy theory 
and higher category theory. Attempts to define SSTs in HoTT lead to some difficulties such as 
the need of infinitary assumptions which are beyond HoTT with only non-strict equality types. 

Voevodsky proposed a definition of SSTs in Homotopy Type System (HTS) an exten¬ 
sion of HoTT with non-fibrant types, including an extensional strict equality type. However, 
HTS doesn’t have the desirable computational properties such as decidability of type checking 
and strong normalization. In this paper, we study a logic-enriched homotopy type theory, an 
alternative extension of HoTT with equational logic based on the idea of logic-enriched type 
theories pun. In contrast to Voevodsky’s HTS, all types in our system are fibrant and it can 
be implemented in existing proof assistants. We show how SSTs can be defined in our system 
and outline an implementation in the proof assistant Plastic [S]. 
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[T] Introduction 

Homotopy Type Theory (HoTT) [^, an extension of Martin-Lof’s intensional Type Theory 
(MLTT), lies in the center of the research area that explores the striking connections between 
homotopy theory and type theory in the study of Univalent Foundations of mathematics. 
Providing a direct language for formalization of homotopy theory, HoTT inherits constructiv- 
ity and some computational properties of MLTT so that proof assistants like Coq m 
and Agda [3] can be used for proof verification and partial automatization. Sophisticated 
constructions from homotopy theory, whose complete formal description in set theory like ZF 
would be hopelessly cumbersome, can be expressed very concisely in HoTT, where the notion 
of a space is taken as primitive. For example, homotopy groups of spheres, fiber sequences, 
van Kampen theorem and many other things have been formalized in this way in HoTT m- 
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Unfortunately, these developments are obstructed by a substantial problem. A type 
in HoTT is not only characterised by its elements, but by the whole structure of weak 
oo-groupoid, generated by the type of paths. Correspondingly, a function in HoTT is not just 
one on elements of types, but a proper oo-functor between oo-groupoids and, as a result, the 
types form a weak oo-category. However, oo-functors and oo-categories are meta-level notions 
for HoTT, whereas attempts to define them internally lead to the need to encode an infinite 
amount of coherence data, which is unclear how to do in HoTT. Only weak n-categories for 
concrete n can be defined so far in HoTT. As a consequence, the notion of homotopy coherent 
diagram of types, which is a oo-functor from homotopy coherent nerve of a 1-category to the 
oo-category of types, is also problematic. Therefore, no general notion of homotopy limit 
can be formulated in HoTT, although for freely generated diagrams it is possible |1]. 

A particular case of the problem is the internalisation of the notion of (semi-)simplicial 
objects in a type universe U or, in short, (semi-)simplicial types. A simplicial type is the 
family of types Xi'.U {i G oj), together with maps d!^ : Xn+i —t Xn and : A„ —)■ A„+i, 
where A„ should be thought of as the type of n-dimensional simplices, d), assigns to a simplex 
X : Xn+i the n-dimensional simplex, which should be thought of as i-th face of x, and s\ 
assigns to a simplex x : A„ its degenerated version at the dimension n -I- 1. Formally, 
and s\^ are just some maps that satisfy certain equational conditions which, if expressed by 
means of the path-equality in HoTT, should be accompanied by coherence conditions for 
these paths and this cannot be expressed in HoTT. Among many other things, simplicial 
types may serve as a useful tool for talking about weak oo-categories in HoTT in terms of 
complete Segal spaces [H] . 

If one omits degeneracy maps in the definition of simplicial types, one would obtain 
Semi-Simplicial Types (SSTs). It simplifies the definition, but is still interesting as SSTs may 
be used, for example, to define complete semi-Segal spaces, which are oo-categories without 
identities. What seems to be missing in HoTT while trying to define SSTs inductively is 
some kind of proof-irrelevant or strict equality. Two definitions of SSTs have been proposed 
independently by Herbelin m and Voevodsky m- Both definitions rely on a notion of strict 
equality which, in the former case, is proof-irrelevant equality of the universe of propositions 
Prop in CIC0 and, in the latter case, is the extensional equality of Voevodsky’s Homotopy 
Type System (HTS) [57]. Unfortunately, CIC with the proof-irrelevant equality in Prop is 
known to be inconsistent with univalent universes. HTS extends HoTT with auxiliary types, 
which do not carry the structure of weak oo-groupoid and correspond to non-fibrant objects 
in Quillen model category. The major disadvantage of HTS is the lack of basic computational 
properties such as decidability of type checking or strong normlization, which makes it not 
implementable in any existing proof assistant 0 

In this paper we exploit the ideas from Logic-enriched Type Theories (LTTs) |TJ |T7] to 
study an extension of HoTT, HoTTEq, where all types are fibrant and SSTs are definable]^ 
LTTs are type theories in which logical propositions and datatypes are completely separate. 
It is thus possible to introduce axioms or new rules of deduction without affecting the world of 


^ The Calculus of Inductive Constructions (CIC) is the type theory implemented in the Coq proof assistant. 
More accurately, the current Coq system nni implements the predicative CIC (pCIC) where Set has 
become a predicative universe (we omit the details here). 

^ Please also note that decidability of type checking is a basic requirement for a type theory to be a 
reasonable logical system and one may regard this as not only a desirable but necessary property. 

^ LTTs are related to the logic with dependent sorts |B], Cartmell’s Generalized Algebraic Theories [5], 
Makkai’s First Order Logic with Dependent Sorts m and Maietti’s PhD thesis m- We omit a detailed 
analysis here. 
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datatypes. For instance, classical principles can be applied merely to logic without destroying 
the constructive nature of types (see, for example, mw- LTTs have been implemented in 
the Plastic proof assistant [SlIT] where formalization tasks based on LTTs have been done 
including, for instance, formalization of Weyl’s predicative foundation of mathematics [2]. 

We shall consider a strict equality in an LTT-setting whose datatype part is HoTT. Our 
system HoTTEq extends HoTT with two kinds of logical formulas, logical equality and 
universal quantification, and a new induction principle for N, the type of natural numbers. 
The inductive definition of SSTs in HoTTEq may be related to Voevodsky’s definition in 
HTS as follows. Let T = ^ A{x), where A{x) encodes some data over a type x. In HTS 

x:lA 

the type family sstn of all n-truncated SSTs is defined by recursion on natural numbers 
sst_rec: N —^ P{t)i where sstn ■= 7ri(7ri(sst_rec(n))) and P{t) is essentially a predicate, 

t-.T 

which expresses the functoriality of some maps in 7r2(7ri(t)) by means of the strict equality. As 
P{t) contains the strict equality, ^ P{t) is non-fibrant. In HoTTEq such non-fibrant types 

t:T 

are avoided by means of the new induction principle for natural numbers, which allows one to 

define a function sst _rec: N —> T and to prove that Vn : N.P(sst_ rec{n)) simultaneously. 

The plan of the paper is as follows. Section 2 contains some background information on 
SSTs and LTTs. HoTTEq is described in Section 3. Section 4 demonstrates how SSTs can 
be defined in HoTTEq and Section 5 outlines an implementation in Plastic. 

I 2 I Background: Semi-simplicial Types and Logic-enriched Type 
Theories 

Originally, Martin-Lof’s intensional type theory (MLTT) was developed as a constructive 
foundation of mathematics with meaning explanations based on the notions of canonical 
object and computation |22l I23| . Surprisingly, the system admits a non-trivial interpretation 
in abstract homotopy theory, with types as abstract spaces, terms as continuous functions 
and identity types as spaces of paths. This unveils intensional type theories as a general 
syntactic framework for formal reasoning about constructions of homotopy theory. Formally, 
such a theory is modelled in a category with the Quillen model structure, allowing to talk 
about homotopical constructions internal to the category [^. A Quillen model structure 
consists of three classes of maps - fibrations, cofibrations and weak equivalences, which satisfy 
certain axioms m- Examples of Quillen model categories include categories of topological 
spaces, groupoids and simplicial sets. 

In particular, HoTT extends MLTT to reflect some important properties of the simplicial 
set model m and, among other things, adds the Univalence Axiom, which is a type-theoretic 
version of the existence of object classifier in an elementary oo-topos [19] . HoTT hence 
provides a direct language for formalization of homotopy theory and higher category theory 
ES] but, as mentioned in the Introduction, there is an obstacle in defining (semi-)simplicial 
types, a notion to be introduced below. We shall also review the LTT-framework whose ideas 
are used in this paper. 

2.1 Semi-simplicial types 

Let A denote the simplicial category with finite ordinals Ob a = {[n]|n € N} as objects and 
with morphisms generated by two classes of monotonic maps: face maps [n] ^ [n-|- 1], 
omitting i in the image, and degeneracy maps sjj : [n -I- 1] —t [n], merging i and i -|- 1. 
A simplicial type is a simplicial object in a universe U, that is a contravariant functor 
X : U, corresponding to a sequence of types Ar([0]) : U, Ar([l]) : U, ^([2]) -.U, ..., 
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X([n]) -.U, ..., together with maps d\ : X{[n + 1]) —> X([n]) and s\ : -^([n]) —> X{[n + 1]), 
satisfying equational conditions as determined by functoriality. X([0]) is the type of points, 
X([l]) the type of segments, ..., and ^([n]) the type of n-simplices, and so on. The maps 
assign a face to (n + l)-simplices by omitting the i-th vertex and the maps form the 
degenerated (n + l)-simplices out of n-simplices by repeating the Tth vertex. 

In the case of semi-simplicial types (SSTs), one only needs to define the notion of a 
functor from the semi-simplicial category, which is a subcategory of the simplicial category 
on face maps. In this paper we are mostly concerned with SSTs and shall use A to denote 
the semi-simplicial category, unless stated otherwise. 

During the Year of Univalent Foundations at IAS m the following presentation of SSTs 
as a family of dependency structures of HoTT has been proposed. Consider the following 
boundary map: 


d„ := (i° X • • • X d” : A([n -I- 1]) —> A([n]) x • • • x A([n]) 

that assigns to each (n -|- l)-simplex a tuple of its n-faces. Then A([n -I- 1]) is equivalent to 
the total space of fibration: 

A([n-hl])~ ^ {dn)~^{xo,...,Xn) 

xg-.X {[n]). ,Xn-.X {[n]) 

where fiber (d„)“^(a;o,..., Xn) is the type of all (n -|- l)-simplicies with boundary (xq, ..., x„) 
and is non-empty iff (xq, ... ,x„) forms a valid boundary. In the case that there’s a type 
of all valid boundaries 6nd„, A([n -I- 1]) can be defined by means of the dependent type of 
fillings of boundaries Yn : bndn —> U : 

A([n-hl]):= r„(x) 

xibndn 


Thus an SST is the following dependency structure (Y„): 


Yo:U 

Yi: Yo^Yo^U 

Y 2 : Yi(a, 6) —>■ Yi(6, c) —>■ Yi(a, c) —>■ id 

a,b,c:Yo 

( 1 ) 


In this way one may define n-truncated SSTs in HoTT for any concrete n, but not for 
hypothised n. This only constitutes a meta-level definition. 

2.2 Logic-enriched type theories 

The concept of an LTT, an extension of the notion of type theory, was proposed by Aczel 
and Gambino in their study of type-theoretic interpretations of constructive set theory [T]. 
It provided them with flexibility to consider logics distinct from the propositions-as-types 
logic. A type-theoretic framework, which formulates LTTs in a logical framework, has been 
proposed in m to support formal reasoning with different logical foundations. 

An LTT is a dependent type theory such as MLTT extended with judgements of the 
following forms: 

H r h P: Prop, asserting that P is a logical proposition under context F. 
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H r h p: Prf(P), asserting that p is a proof of proposition P (we often omit the Prf- 
operator.^ 

In this paper, we shall employ the LTT-framework as studied in m where a logical framework 
is used to specify LTTs, which is implemented in the proof assistant Plastic pm. A logical 
frmawork is a meta-language for specifying type theories, which is itself a dependent type 
theory. The rules of this framework for LTTs can be found in [2] (particularly its Appendix 
A). Besides the kind Type of types, we also have the kind Prop whose objects are logical 
propositionsj^ These kinds are governed by the following rules: 


r valid 

r h Type kind 


r h A: Type 
r h E1(A) kind 


V \- A = B'. Type 
r h E1(A) = E1(B) 


r valid 


r h P: Prop 


T \- P = Q: Prop 


r h Prop kind T h Prf(P) kind T h Prf(P) = Prf((5) 
The rules for valid context formation is as usual: 


r h a: kind X ^ FV{T) 
0 valid T, X : K valid 


Please note, however, since there are new kinds Prop and Prf(P), one can assume proposi¬ 
tions and their proofs as well as types and their objects. There are also parametric kinds 
of the form {x : K)K', which are H-constructors at the level of kinds. They are also called 
H-kinds, not to be confused with H-types: the former is meta-level constructs while the latter 
is at the object level. Il-types can be introduced as follows: 


B: (A : Type,P : {x : A)Type)Type 
A: (A : Type,P : {x : A)Type,/ : (x : A)P[x])n[A, P] 
£n : (A : Type, P : (x : A)Type, C : (P : n[A, P])Type, 
f:{g:{x: A)B[x])C[X[A,B,g]],z : n[A,P])C[z] 


plus a computation rule which we omit here. 

The nice property of LTTs is that the introduction of new logical axioms or logical rules 
doesn’t affect world of types. This has given birth to an interesting direction of research. For 
instance, traditionally, the propositions-as-types logic in dependent type theories cannot be 
made classical without introducing unwanted closed terms in the data-types such as that of 
natural numbers, which do not compute to any canonical objects. For example, in MLTT the 
law of Exluded Middle would generate an element of N -|- (N —0), which doesn’t compute 
to any canonical element of the type. As LTTs are free of such a problem, they are better 
suited for classical reasoning with type theory. Work on the subject includes [niia and the 
Plastic proof assistant has been developed to support LTTs mm and it was used to give 
computer checked formalization of Weyl’s classical predicative mathematics |2]. 

In this work we investigate another interesting application of the LTT-framework: resolving 
the coherence problem in HoTT. For this purpose we slightly diverge from what has been 
understood as an LTT in [T] or m in the following sense. 


It is possible to consider a system without proof terms by only considering judgements of the form 
r h dn =^’ d true, as in [T]. Here we consider proof terms and they do not make any essential 

difference in most of the cases (and definitely not in this paper). 

® Note that, different from Coq, Prop is not a type and, hence, we do not automatedly have higher-order 
logic in LTTs. 
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H We form HoTTEq by adding a logical equality and universal quantification, but it doesn’t 
have full first-order logic of LTTs. In another words, in HoTTEq, only equational reasining 
is considered and, in a sense, it is closely related to generalized algebraic theories. 

H Logically equal terms in HoTTEq are interchangeble in both propositions and types, 
whereas in LTTs they are interchangeble only in propositions. 

H Induction principles of HoTTEq are more sophisticated than those in LTTs. In LTTs an 
inductive type is characterised by an elimination principle and logical axioms of induction. 
These are two separate mechanisms for constructing functions and proving propositions. 
In HoTTEq these mechanisms are merged into one. 

However, having said the above, the key idea of LTTs that propositions and datatypes are 
separated plays a key role in the work to be described below. 


HoTTEq: HoTT Enriched with Logical Equality 


As in the LTT-framework (see (2.21, HoTTEq extends HoTT with two forms of judgements: 
r h P: Prop and T h p : P. Contexts of HoTTEq can contain both type/object variables and 
proposition/proof variables. We shall follow the rules for LTTi [T7]. In LTTi, however, every 
context can be split: T is equivalent to (TType, Tprop), where Txype contains type/object 
variables and Tprop contains proposition/proof variables. This is because that, in traditional 
LTTs, propositions or their proofs do not occur in types or their objects. For a type theory 


h Txype if, and only if, Txype k Jxype, where Jt 


Lype 


IS 


like LTTi, we have: ExypeiTprop 
either A : Type or a : A. In contrast, in HoTTEq one can construct more objects with 
assumptions of the logical equality between terms. This property will be crucial for the 
definition of SSTs. 

We shall also have the rule for proof irrelevance: 


r h P: Prop T \- p: P T \- q: P 


(PI) 


T \- p = q\ P 

which states that any two proofs of a proposition are definitionally equal. 


3.1 Logical operators 

HoTTEq contains only two logical operators: equality x =a y '■ Prop and universal quantific¬ 
ation Wx : a.P{x) : Prop, where a is either a type or a proposition. The rules for the logical 
equality are reminiscent of those of the Martin-L6f identity, where the J-like eliminator is 
duplicated for propositions and types. Additionally, the logical equality is defined to satisfy 
function extensionality by the rule (LEqFE). The rules are as follows: 


TEA: Type rha:A ri-6:A 
r h a =A b: Prop 


(LEqForm) 


TEA: Type rEa:A 
r E r^ : a =A a 


(LEqIntro) 


T,x : A,y: A,p : x =Ay\- T[x, y,p] : Type T, a: : A E t{x) : T[x, x, r] 
r,a: : A,y : A,p : a: =a J/ E £'£{x,y,p,t) ■ T[x,y,p] 


(LEqElimT) 


T,x ■. A, y : A,p : X =a y E P[x, y,p] : Prop T, a; : A E q{x) : P[a:, a:,r] 
r,a; : A,y : A,p : a: =a y E £^{x,y,p,q): P[x,y,p] 


(LEqElimP) 
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T,x ■. A,y. A,p ■. X =Ay'^ T[x, y,p \: Type T, a: : A h t{x) : T[x, x, r] 
T,x : A\- Cmpt{x): ST (x, x, r, t) =T[x,x,r\ 


(LEqComp) 


r h A: Type F, x : A h B{x): Type 
r,/,g : F,p : (Vx : A.f(x) =b(x) g(x)) F FE{f,g,p): f =f g 


(LEqFE) 


where F = B{x). 

x:A 

And for the universal quantification (where a is either Type or Prop): 


FhAicr r,x : A h P(x): Prop 
r h Vx : X.P{x): Prop 


(FAForm) 


FFAicr F,x:AI- p(x): P{x) 
Fh Jv(p): (Vx: A.P(x)) 


(FAIntro) 


FhA:CT F hp: (Vx : A.P(x)) 

- (FAElim) 

F, X : A h S\f{p, x): P(x) 

Using the eliminators and ST and the universal quantification, one can construct the 
transitivity proof: for p: a =a b and q: b —a c, the proof q ■ p: a =a c. Also, for p: a =a b 
and (x : A)Y (x): cr, one can construct the substitution subst^ (y): Y{b), where y :Y{a). 

The following straightforward lemmas assure that logical equality, defined in this way, 
behaves as expected. They will be required in Section 4. 

► Lemma 1. For any type A: Type, any type family T: (A) Type over A, if p: x =a y, 
q: y =a z, then subst^ o subst^ = subst'^.p. 

► Lemma 2. For any family of functional types T = {x \ A) W C{x,y), any object a: A, 

y.B 

any function f : J([ C{a,y) and any equality proof p: a =a b, the following holds: 

y.B 


Vy : B.substp{f){y) = subst^’' ’^\f{y))- 


3.2 Induction 

In LTTs, an inductive type is characterised by an elimination rule that specifies how one can 
construct elements of other types out of the objects of the inductive type, and an induction 
rule that specifies how propositions about objects of the inductive type can be proven. For 
example, for the type of natural numbers N, it does not only have the familiar elimination 
rule but have the following induction rule: 

F, n : N h P„ : Prop T\-b:Po F, n : N,p : P„ h i/i: P„+i 
F, n: Ah Ind-yi{b, ih, n): Pn 

This is fine as long as proof terms do not occur in types or their objects. In HoTTEq this 
property doesn’t hold and the above form of induction becomes insufficient. This happens 
because, if inductive hypothesis has the form: 

n: N,t: Tn,p-. Pn{t) h ihT{t,p): T„+i 

n: N,t: Tn,p: P„(t) h i/ip(<,p): Pn+i{ihT{t,p)) 
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where Tn are types and Pn{t) are propositions, then the elimination rule for N cannot be 
applied to obtain a function of type T^. However note, that if propositions were types, 

n:N 

this inductive hypothesis could have been rewritten in terms of type family ^ Pn{t)- Thus, 

t-.Tr, 

instead, we introduce a mechanism that not only constructs a function from an inductive 
type but, simulteniously, proves a property of the function (the premises are the same): 

rh6:To T^pb:Po{b) 
r,n: N,t: Tn,p: P„(f) h ihT{t,p) \ T„+i 
r,ri,: N,t\ Tn,p-. Pnjt) h ihp{t,p ): P„+i(zhr(t,p)) 
r, n: iV h £j^{b,pb, ihr, ihp, n ): T„ 

and 


rh6:To T^pb-.Po{b) 
r,n: N,t: Tn,p: Pn{t) h ihT{t,p): T„+i 
r,n: N,t: Tn,p: P^jt) h ihp{t,p ): Pn+i{ihT{t,p)) 
r, n: iV h £^{b,pb, ihp, ihp, n): Pn{£j^{b,pb, ihp, ihp, n)) 

with the following computation rules: 

r \-£]sf{b,pb,ihT,ihp,0) = b 

T,n: N \~£ff{b,pb, ihp, ihp, n -|- 1) = ihT{£j^{b,pb, ihp, ihp, n),£^{b,pb, ihp, ihp, n)) 


4 I Inductive Definition of Semi-Simplicial Types 

We shall first give an outline on how to define SSTs in HoTTEq and then describe the 
constructions in more details. 

4.1 Outline 

In this subsection we show how the inductive construction, as described by Voevodsky m, 
of the tower of dependency structures of SSTs (see (Q at the end of Q fails in HoTT, but 
can be done in HoTTEq. 

The inductive procedure constructs (n -I- l)-truncated SSTs out of an n-truncated ones. 
Explicitly, types sstn of all n-truncated SSTs are defined inductively by assigning a type of 
(n -|- l)-simplices to every valid n-dimensional bounary of a (n -I- l)-simplex: 

sst„+i = ^ bnd]^'^^ (x) ^ U 

x:sstn 

where bnd™(x) is the type of n-boundaries of a m-simplex in x. The type bnd™(x) is defined 
inductively by representing bnd'^pi{x) as the type of pairs {y,aug), where y. bnd™{x) and 
aug: Fill{resth^ {y)) is an augmentation of n-boundary y, obtained by choosing 

/:[n+l]->.[m] 

a (n -|- l)-simplex for every restriction of y to (n 1 (-dimensional subsimplex f of a m- 
dimensional simplex. Here restriction maps resth^{y) can only be defined inductively in the 
assumption of functoriality of them. Then functoriality can be defined inductively only with 
further coherence assumptions and so on. 
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We avoid this obstacle in HoTTEq by using the induction principle for natural numbers 
as given in §3.2[ which makes it possible to prove functoriality mutually with the type 
construction. In denotes this functoriality predicate. 

The rest of the section is devoted to the detailed exposition of how to construct the type 
family sst„. 


4.2 Face maps 

We define combinatorics of semi-simplicial category in type theory by the type A(i,j): Uq of 
all increasing functions between standard intervals Stn(i) and Stn{j), namely: 


where: 


:= X! is_incrT{f) 

f-.Stn(i)^Stn{j) 


Stn{i) := leq{n, i) 

n:N 

is_incrT{f) '■= n ls{n,m) ls{f{n),f{m)) 

n,7n:Stn{i) 

Composition — — of two face maps {f,Pf) ■ A(i,j) and ig,Pg) ■ A(j, k) is defined as 

follows: 


(9,Pg) oa {f,Pf) ■■= 

{g o /, An, m : Stn{i).pg{f{n), f{m)) o pf{n, to )) 

Note that, by the Ty-rule, the associativity of composition holds definitionally. 

4.3 Inductive construction 

We use induction for natural numbers HoTTEq to define simultaneously the data and a 
proof of a predicate on this data. Data construction is as follows: 

H Type family of all n-truncated SST, such that computes to ^ bnd^'^^{x) ^ 

X\SStn 

Uq and ssto = ^o- 

H Type family bnd™{x : sst^) : Ui of n-boundaries of m-simplex in x, such that: 

_ bndlP(x : sstg) = Stn{m) —>■ x. 

_ A (n+ l)-boundary is a pair (y, any), consisting of n-boundary y and it’s augmentation 
aug. Precisely, bnd'^^i{x, Fill), where x : sst„. Fill : 6nd”+^(x) -^Uq, computes to: 

Fill{restl'^{y)) 

y.bnd'^(x) /:[ra+l]->'[m] 

_ Family of maps (y) : bnd^{x), where y : bnd^{x), restricting n-boundary of 

TO-simplex y to the n-subboundary of face / : A(k,m) of m-simplex, such that: 


_ = y o 7ri(/) 
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Inductive step here deserves a comment as this is the point, where functoriality is 
required. At this stage the value of the following expression should be specified, where 
{y,aug) is unfolded presentation of {n+ l)-boundary bnd^j^i {x): 


, f:A(k,m),x / \ 

[y,aug) 

This can be done by taking n-boundary rest(;^{y ): bnd^{x) together with some aug¬ 
mentation of it, which should be of type Fill{rest^’^{rest(^^{y))). But if 

h\A{n-\-l ,k) 

we try to use given augmentation \h.aug{f oh), we would obtain a term of type 
(y)). Thus we require, that restn satisfy the following func- 

h:A(n-\-l,k) 

toriality condition: 


funcn- : N.V/ : A{k,l),g : A{l,m). 

Vy : bnd^(x)(y) = restl^^(rest^^{y)) 

The correct augmentation can be obtained by using substitution: 

Xh.subst^^^^ h f, Aaugifoh)) 

To complete the inductive definition, it remains to prove functoriality for restg for 
restn+i, provided it holds for restn- Assume that / : A{k,l) and g : A{l,m). The base case 
is straightforward: 

= y o TTi{g o f) = y o ( 7 ri(g) o 7 ri(/)) = 

= {y° 71-1(5)) o 77 i(/) = restl’"^ o restl'^^iy) 
and thus funcl’^{y) is just reflexivity. 

Using funCn, we now construct the proof funCn^i(y): (rest®q^{^(y) = restn)^^orestn+i{y))- 
By definition rest^n+^{y) ^^id restn^-^^ o rest^n+i{y)^ where y : bndl^j^i{x), compute to the 
following pairs: 


rest^°_lf iy,aug) = (rests°-^’"^(5). Ah : A{n + 1 , k).subst^l^\,scfiaug{{g o f) o h))'^ 

orest®’+i(5) = rest{’+i (rest^’^(y), Xh : A{n + l,l).subst^;)^^\,,{aug{g o h))^ = 

= (resti’^{restin’"'{y))^ : A(n -f 1, k).subst^^J\j{subst^l^l^,^joh{aug{g o (/ o h))))) 

Each of these pairs is a point in a fiber of the family BE := (5 : bndn{x)) H Fill{restn’^{y)). 

h:A{n-\-l,k) 

By inductive hypothesis, there is equality /unc{’®(5) between first components. Denote augi 
and aug2 the second components of the first and the second pair respectively. It remains 
to prove, that subst^^^j^g{augi) = aug2- By Lemma 2 and (LEqFE) rule this equality is 
equivalent to (h : A{n + l,k))subst^^^^f_g{augi h) = aug2 h. aug{go[f oh)) computationally 
equals to auqiiqo f)oh) and by Lemma 1 subst^^'^^ g, . osubst^^’^^ „ = subst^A^^ hi. a fch- 

^ o / / c- funCn funCn funCji’ ■ func^' 

Thus subst^^’"’’ f g{augi h) and 01152 h are two substitutions of the same term, therefore by 
(PI) they are equal. 


F. Part and Z.Luo 
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[H Implementation in Plastic 

Plastic is a light-weight proof assistant, developed by Paul Callaghan in 1999 |7]. It’s 
underlying system is Luo’s Logical Framework m and it’s syntax is very similar to that of 
Lego dH]. Plastic is the only proof assistant that supports LTTs and is flexible enough for 
the developments, described in this paper. 

In this section we outline the key aspects of the implementation of HoTTEq and SSTs in 
Plastic. The source code of Plastic together with this implementation is available at github m 
(the SST implementation is located at the subdirectory lib/Univalence/SimplicialTypes). 

5.1 HoTTEq: Implementation in Plastic 

Rules of a type theory are expressed in Plastic by means of LF. For example, rules (LEqForm), 
(LEqIntro), (LEqElimT) and (LEqElimP) for logical equality are expressed as the following 
code in Plastic (here A ^ B is the abbreviation for the kind (_ : A)B): 


[Eq : 

(A : 

Type) A - 

> 1 

i -> 

Prop] ; 







[Eqr 

: (A : 

Type) (a 


A) Eq A a a] 

) 






[EqE_ 

.T : (A 

: Type) 

(T 

: (x 

: A)(y:A) 

( 

_ : Eq 

7 

X y)Type) 




(_ 

: (x:A)T x 

X 

(Eqr 

? x))(x 


A)(y: 

A) 

(p:Eq ? X 

y) 

T X y p] ; 

[EqE_ 

.P : (A 

: Type) 

(P 

: (x 

:A)(y:A) 

( 

_ : Eq 

7 

X y)Prop) 




(_ 

: (x:A)P X 

X 

(Eqr 

? x))(x 


A)(y: 

A) 

(p:Eq ? X 

y) 

P X y p] ; 


Plastic supports standard pattern of inductive definitions. For example, the type of paths 
is defined as follows: 

Inductive [A:Type][Id_ : (x:El A)(y:El A)Type] 

Constructors 

[Idr : (z:El A)Id_ z z]; 

One of key features of Plastic is the mechanism to specify computation rules for customised 
eliminators of inductive types. This makes it possible to implement induction of HoTTEq 
(and even higher inductive types). Specialised computation rules can be defined by the 
command SimpleElimRule. This gives access to the underlying mechanism of Plastic, used 
for inductive types and universes. Basically, the term, which is to be used as the combinator 
for elimination operator and constructor arguments, is specifyed in this way. The general 
syntax is as follows: 


SimpleElimRule TYPE 

_NAME ELIM_NAME 

ELIM_ 

ARITY 

[C0NSTR_1 

C0NSTR_1_ARITY = 

TERM 

: TYPE] 

[C0NSTR_n 

CONSTR_n_ARITY = 

TERM 

: TYPE] ; 


For example, this command allows one to define the recursion principle for a circle, so 
that it computes on the point constructor: 


[Circle : Type]; 

[base : Circle]; 

[loop : Id_ ? base base]; 

[CircRec : (A:Type)(a:A)(1: Id_ ? a a)Circle->A] ; 

SimpleElimRule Circle CircRec 4 

[base 0 = [A:Type][a:A][l:Id_ A a a] a : 

(A:Type)(a:A)(_:Id_ A a a)A]; 
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Because there’s no way to implement the strong proof-irrelevance (PI) in the current 
version of Plastic, we replace it with the following rule: 


[PI : 

(P : 

Prop) (A : Type) (t 

: P -> A) (p , q : P) 




Eq ? (t p) (t q) ] ; 


5.2 Semi-simplicial types 

The definition of SSTs by means of an inductive procedure, as described in ®1 is implemented 
as two maps: t : T,p : P{t) h ihxitjp): T and t : T,p : P{t) h ihp{t,p): P{ihT{t,p)), where: 


T := ^ ^ bn<r^{x) —)■ bnd^{x) 

SST\IA\ 6nd:S’S’T—>-N—vWi a::SST,fc,m:N,/:A(A;,m) 


P{{SST,bnd,rest) : T) := Vx : SST.\/k,l,m : N.V/ : A{k,l),g : A{l,m). 

Vy : bnd"^{x).rest^°^'^{y) = rest^'^(rest^'^{y)) 

Then, desired functions sst_recT : N —>■ T and sst_recp{n : N): P{sst_recT{n)), such 
that sst_recT{n + 1) = ihp{sst_recT{n), sst_recp{n)), are obtained by applying induction 
principle of Section 3. With proof scripts omitted as they are too cumbersome (see m) the 
code is as follows: 

[T = Sigma ? ([SST:Type~1] Sigma ? ([bnd:(T~l SST)==>(Nat==>Type~1)] 

Pi3 ? ? ? ([x:El (T~l SST)][k:Nat][m:Nat] 

Pi ? ([f:El (Delta k m)] 

T~1 (ap2_ ? ? ? bnd x m) ==> T~1 (ap2_ ? ? ? bnd x k) 

)))) ] ; 

[P = [t:T] A11_T ? ([x:(SST_pr t)] 

AllNatS ([k,l,m:Nat] 

A11_T ? ([f:El (Delta k 1)] A11_T ? ([g:El (Delta 1 m)] 

A11_T ? ([y:(T~l (bnd_pr t x m))] 

Eq ? (rest_pr t x k m (fm_comp k 1 m f g) y) 

(rest_pr t x k 1 f (rest_pr t x 1 m g y)))))))]; 


Claim 

H 

1 

•H 

(n : 

Nat) (t 

: T)(p : 

(P 

t))T; 

Claim 

ih_P : 

(n : 

Nat) (t 

: T)(p : 

(P 

t))P (ih_T 

Claim 

to : T ; 






Claim 

pO : P 

to ; 






And the type of all n-truncated SSTs is obtained by application of the data component 
IE_NatT of induction for natural numbers: 

pil ? ? (IE_NatT T P to pO ih_T ih_P n); 





F. Part and Z.Luo 
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Conclusion 


The system HoTTEq and the succsessful definition of SSTs in HoTTEq, presented in this 
paper, is just one example of how HoTT can benefit from a logic enrichment. In general, 
strict Prop of logic-enriched HoTT allows to talk about subsets (TType, Tprop) of the fibrant 
object, which represents a context of types Txype- In further work we plan to explore in 
more detail a categorical semantics of the logic-enriched HoTT. 

Definition of SSTs in HoTTEq clears up also many interesting directions for a further 
formalisation work. 

Extending this definition to the definition of full simplicial types seems to us to be possible, 
although it requires some technical details to be worked out. 

Another possibility is to explore, what can be already done by means of SSTs. Eor 
example, straighforward definitins can be done for natural transformations between SSTs and 
complete semi-Segal types, which reflect the structure of weak oo-category without identities. 
In further work we plan to figure out, how the globular structure of the type of paths on a 
universe can be realized as a complete semi-Segal type. 
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